home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Freelog 22
/
freelog 22.iso
/
Prog
/
Djgpp
/
GPC2952B.ZIP
/
doc
/
gpc
/
docdemos
/
incdecdemo.pas
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
Macintosh to JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
Pascal/Delphi Source File
|
2001-02-09
|
170 b
|
10 lines
program IncDecDemo;
var
i : Integer;
c : Char;
begin
Inc (i); { i := i + 1; }
Dec (i, 7); { i := i - 7; }
Inc (c, 3); { c := Succ (c, 3); }
end.